home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / ARGONET / PD / PROGRAMMING / DESKLIBC / SOURCES.ZIP / DeskLib / !DLSources / Libraries / WimpSWIs / s / 14GetIInfo < prev    next >
Text File  |  1995-08-26  |  2KB  |  58 lines
  1. ;
  2. ;       Title                  : Wimp Get Icon Info
  3. ;       System                 : Wimp Library
  4. ;       Version                : 1.0
  5. ;       Copyright              : (C) John Winters
  6. ;       Date                   : 12th January, 1990
  7. ;       Author                 : John H. Winters
  8. ;
  9. ;       Function               : Gets information about an Icon.
  10. ;
  11. ;
  12. ;       Modification history.
  13. ;
  14. ;       Version                : (Reflect in header IDENT)
  15. ;       Date                   :
  16. ;       Author                 :
  17. ;       Changes                :
  18. ;
  19. ;
  20. ;============================================================================
  21. ;
  22. ;  Include files.
  23. ;
  24. ;============================================================================
  25. ;
  26.         GET     ^.h.regdefs
  27.         GET     ^.h.swinos
  28.         GET     ^.h.macros
  29. ;
  30. ;============================================================================
  31. ;
  32. ;  Code.
  33. ;
  34. ;============================================================================
  35. ;
  36.         PREAMBLE
  37.         STARTCODE Wimp_GetIconState
  38. ;
  39.         STMFD   sp!, {v1, v2, v3, v4, lr}
  40. ;
  41. ;  Need a 40 byte block for general storage.
  42. ;
  43.         SUB     sp, sp, #40
  44.         STR     a1, [sp, #0]
  45.         STR     a2, [sp, #4]
  46.         MOV     a2, sp
  47.         SWI     SWI_Wimp_GetIconState + XOS_Bit
  48.         ADD     sp, sp, #8
  49. ;
  50. ;  Copy 32 bytes, i.e. 8 registers full into user space.
  51. ;
  52.         LDMFD   sp!, {a1, a2, a4, v1, v2, v3, v4, ip}
  53.         STMVCIA a3, {a1, a2, a4, v1, v2, v3, v4, ip}
  54.         MOVVC   a1, #0
  55.         LDMFD   sp!, {v1, v2, v3, v4, pc}^
  56. ;
  57.         END
  58.